Top 10k strings from Plus D Util (19xx)(MicroHobby)(es).tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TAP] (TOSEC-v2007-01-01) /
Back to the directory listing
4 +dire)+256
3 "Longitud: ";
2 a$=(a$+" ")(
2 PISTA=PISTA-1
2 @*,p,s,59744
2 ;"NOMBRE:";
2 "p+128*c",s,
2 "Longitud variables: ";
2 "Comienzo: ";
2 "61078+a",
1 todos.cm M
1 set27
1 s0=s0-p0*h+1
1 r$="lativa":
1 q;"Pulsa EDIT para cortar la opcion";
1 p=p-(s=h):
1 edisect 1
1 desen.code9
1 col=col+10
1 col;up;",";us;
1 col;a$;"=";
1 a$=" "
1 a$=" ":
1 S SECTOR D PISTA W DISCO E ESCRIBIR U LEER A COPIAR F CADENA G BYTES Y SIGUIENTEI MODOS Q VOLVER C CARA
1 PLUSD UTILu;2
1 NOPLD INC DEC RLCARRCARLA RRA DAA CPL SCF CCF EX AF,AF'ADD ADC SUB SBC AND XOR OR CP DJNZJR RET EXX POP PUSH JP CALL RST DIEIIN OUT EX (SP),EX DE,HLLD SP,HALTRLC RRC RL RR SLA SRA SLL SRL BIT RES SET SBC ADC NEGIMRRDRLDLDCPINOUTIOUTDOTIROTDRDEFB 0123456789ABCDEFBCDEHL A(HL)(IX(IYBCDEHLAFSPIXIYNZZ NCC POPEP M
1 ERROR EN DISCO
1 DIR=DIR+510
1 BYTE? (ENTER=FIN)
1 A=DIS+(N*510
1 @*,a,b,6e4
1 ;p;":";s;" ";
1 ;p0;":";s0,:
1 ;"TIPO:";("BASIC FILE"
1 ;"SECTORES OCUPADOS:";so
1 ;"SECTORES OCUPADOS: ";so;" "
1 ;"SECTOR: "
1 ;"REGISTROS DEL SNAPSHOT"
1 ;"Pulsa una tecla.":
1 ;"Pulsa la opcion que te interese.":
1 ;"Pulsa el numero a corregir, o:"'"'G'-grabar X-examinar EDIT-menu":
1 ;"Pista",'',,
1 ;"No esta en el disco.",:
1 ;"No esta en el directorio":
1 ;"NUMERO:";n;
1 ;"NUMERO:";N;
1 ;"N:";M;" "
1 ;"METE EL DISCO PARA ANALIZAR":
1 ;"MAPA DE SECTORES OCUPADOS (P/S)"
1 ;"LON.VAR.:";
1 ;"Has cometido un error."
1 ;"Estoy buscando... espera.":
1 ;"Estas seguro de que"'"quieres grabar?":
1 ;"Espera un momento.",:
1 ;"ERROR EN FICHERO ";S$:
1 ;"Direccion re"+r$+": ";
1 ;"DESCRIPCION:";:
1 ;"COMIENZO:";
1 ;"CARGANDO P:";P;" S:";S;" N:";N;" D:";DIR
1 ;"Buscando "+((
1 ;" PLUSD UTIL":
1 ;" DESENSAMBLADOR ";
1 ;" 7.Chequear estado diskette."
1 ;" 6.Desensamblador."
1 ;" 5.Ejecutar Infodisk."
1 ;" 4.Ejecutar Edisect."
1 ;" 3.Modificar los sectores."
1 ;" 2.Modificar el directorio."
1 ;" 0.Salir del programa."
1 ;" INFORMACION DEL DIRECTORIO"
1 ,p0,s0,59744
1 ,PISTA,SECTOR,4E4
1 +dire),"LONGITUD:";
1 +dire),"D/L COM.:";
1 +dire)*256
1 +DIRE)*256
1 );("STRING ARRAY"
1 );("DATA ARRAY"
1 );("CODE FILE"
1 ''"Sectores usados: ";so''"Espacio ocupado: ";
1 '"Primer sector utilizado: ";
1 '"Numero: ";n;" ";s$+"1";:
1 '"Fichero a modificar: ";
1 '" FICHERO BORRADO "
1 "y+1-32*(y=31)":
1 "todos.cm"
1 "so*512";" bytes"
1 "s-p*h+1":
1 "p-128*(p>127)";":";
1 "p+128*c":
1 "p*20+s*2":
1 "desen.code"
1 "c*800+p*h+s-40-1":
1 "a>60511":
1 "a+n*510-9":
1 "Tipo: ";"Basic"
1 "SNAPSHOT 48K"
1 "SNAPSHOT 128K"
1 "QUIERE CARGAR SECTOR DISCO?: ";
1 "Pista (0-79): ";p:
1 "PROGRAMA BASIC"
1 "PANTALLA"
1 "Numero: ";
1 "Nombre: ";:
1 "Nombre: ";
1 "NO DEFINIDO"
1 "MATRIZ DE DATOS"
1 "MATRIZ ALFANUMERICA"
1 "Linea de autoejecucion: ";
1 "IY ","IX ","DE'","BC'","HL'","AF'","DE ","BC ","HL ","IF ","SP "
1 "Fichero ilegal num.","Fichero borrado","Programa BASIC","Matriz numerica","Matriz alfanumerica","Bloque de bytes","Snapshot de 48K","Fichero de microdrive","Pantalla","Fichero especial","Snapshot de 128k","Fichero de datos","Fichero ejecutable"
1 "FICHERO TIPO OPEN"
1 "FICHERO MICRODRIVE"
1 "FICHERO ESPECIAL"
1 "FICHERO EJECUTABLE"
1 "FICHERO BORRADO"
1 "Direccion de arranque: ";
1 "Dato numero "+
1 "DIRECCION DESENS.: ";DIS
1 "DIR. CARGA? (40000+8K): ";DIR
1 "Cadena a buscar: ";
1 "Autoejecucion: ";
1 "6e4+x*32+y",
1 "65+c"''"Dato: ";
1 "65+(p>127)";" ";
1 "64869",H:
1 "64867",H:
1 "61051",a-
1 "61051"+" bytes.")
1 "60999");:
1 "60211";"Matriz numerica"
1 "60211";"Matriz alfanumerica"
1 "60211";"Bytes"
1 "60014+a":
1 "60013+a":
1 "60001+x*32+y"
1 "5";k;" FICHEROS CON ERRORES":
1 "5";"Estoy investigando..."
1 "5";"Este sector no tiene par p:s":
1 "5";"Este sector de disco esta libre.":
1 "5";"Directorio. Ficheros: ";a-
1 "5";"DISCO EN PERFECTO ESTADO":
1 "5";" Fichero n.";n;" Nombre: ";:
1 "4e4"+dire)
1 "40240"+dire
1 "40220"+dire
1 "40010"+dire
1 "40001"+dire
1 "4";"Sector ";p;":";s," CARA ";
1 "256*(x>q)":
1 "256"*(n/w>
1 "2";up;",";us;
1 "2";" 1.Directorio del diskette."
1 "19";p;":";s;" ";
1 "16";s$+"4";:
1 "10";"SECTOR: "
1 "(";z;")";:
1 " SECTOR? ";S:
1 " PISTA? ";P:
1 " NUMERO DE SECTORES? ";N:
1 " MAS DIRECCIONES? ";
1 " IMPRESORA? ";
1 " HEXADECIMAL? ";
1 " NUMERO PROGRAMA: ";n
1 " OTRO? (s/n): ";
1